home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Programming / MUI / MCC_TimeString / Developer / Modula / txt / MCCTimeString.mod < prev   
Encoding:
Modula Implementation  |  1996-12-11  |  445 b   |  24 lines

  1. IMPLEMENTATION MODULE MCCTimeString;
  2.  
  3. (*
  4. **
  5. ** Copyright © 1996 Kai Hofmann. All rights reserved.
  6. ** Registered MUI custom class!
  7. **
  8. ** $VER: MCCTimeString.mod 12.2 (11.12.96)
  9. **
  10. *)
  11.  
  12.   FROM SYSTEM    IMPORT ADR, ADDRESS;
  13.   FROM MuiL    IMPORT mNewObject;
  14.   FROM UtilityD    IMPORT TagItemPtr;
  15.  
  16.  
  17.   PROCEDURE TimeStringObject(tags : TagItemPtr) : ADDRESS;
  18.  
  19.   BEGIN
  20.     RETURN mNewObject(ADR(mcTimeString),tags);
  21.   END TimeStringObject;
  22.  
  23. END MCCTimeString.
  24.